home *** CD-ROM | disk | FTP | other *** search
/ Monster Media 1996 #15 / Monster Media Number 15 (Monster Media)(July 1996).ISO / prog_pas / cddk9605.zip / TUTOR.ZIP / TUTOR2.PAS < prev    next >
Pascal/Delphi Source File  |  1996-05-16  |  584b  |  30 lines
  1.  
  2. PROGRAM Tutor2;
  3.  
  4. {$A+,B-,F+,I-,Q-,R-,S-,X+}
  5.  
  6. USES
  7.   Concerto, IO, Scripts;
  8.  
  9. BEGIN
  10.  
  11. { The next two procedures are explained in TUTOR1.PAS }
  12.  
  13. RegisterConcerto;
  14. Script('Init');
  15.  
  16.  
  17. { The next procedure displays the specified file.  The default
  18.   extension is ANS.  Since Concerto provides runtime conversion
  19.   and optimization of color codes (including Color->ASCII conversion)
  20.   there is no need for the multi-extension system used by some
  21.   BBS packages. }
  22.  
  23. SO_DisplayFile('Welcome2');
  24.  
  25.  
  26. { The next procedure is explained in TUTOR1.PAS }
  27.  
  28. ExitDoor(0);
  29. END.
  30.